home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Internet Tools 1993 July / Internet Tools.iso / RockRidge / mail / metamail / bin / showpicture < prev    next >
Encoding:
Text File  |  1993-05-24  |  2.4 KB  |  85 lines
  1. #!/bin/csh -f
  2. # Copyright (c) 1991 Bell Communications Research, Inc. (Bellcore)
  3. # 
  4. # Permission to use, copy, modify, and distribute this material 
  5. # for any purpose and without fee is hereby granted, provided 
  6. # that the above copyright notice and this permission notice 
  7. # appear in all copies, and that the name of Bellcore not be 
  8. # used in advertising or publicity pertaining to this 
  9. # material without the specific, prior written permission 
  10. # of an authorized representative of Bellcore.  BELLCORE 
  11. # MAKES NO REPRESENTATIONS ABOUT THE ACCURACY OR SUITABILITY 
  12. # OF THIS MATERIAL FOR ANY PURPOSE.  IT IS PROVIDED "AS IS", 
  13. # WITHOUT ANY EXPRESS OR IMPLIED WARRANTIES.
  14. #
  15.  
  16. if (! $?METAMAIL_TMPDIR) then
  17.     set METAMAIL_TMPDIR=/tmp
  18. endif
  19.  
  20. if (! $?X_VIEWER) then
  21. set X_VIEWER="xloadimage -view -quiet -geometry +1+1"
  22. # set X_VIEWER="xv -geometry +1+1"
  23. endif
  24. if ($1 == "-viewer" && $#argv > 1) then
  25.     set X_VIEWER = "$2"
  26.     shift
  27.     shift
  28. endif
  29.  
  30. if (! $?DISPLAY) then
  31.     echo ""
  32.     echo This message contains a picture, which can currently only be
  33.     echo viewed when running X11.  If you read this message while running
  34.     echo X11, and have your DISPLAY variable set, you will then
  35.     echo be able to see the picture properly.
  36.     echo ""
  37.     if ($?MM_NOTTTY) then
  38.         set fname=${METAMAIL_TMPDIR}/sp.$$
  39.         echo "The picture is being automatically stored in the file $fname"
  40.         echo "If you do not want this file, please delete it."
  41.     else
  42.         echo -n "Do you want to write the picture out to a file [y] ? "
  43.         set ANS=$<
  44.         if ("$ANS" =~ n* ||  "$ANS" =~ N* ) exit 0
  45.         echo -n "File name:"
  46.         set fname=$<
  47.     endif
  48.     cp $1 $fname
  49.     if ($status == 0) echo Wrote file $fname
  50.     exit 0
  51. endif
  52.  
  53. if ($#argv == 0) then
  54.     set SQUIRREL=${METAMAIL_TMPDIR}/sp.$$
  55.     cat > $SQUIRREL
  56. else
  57.     set SQUIRREL="$*"
  58. endif
  59.  
  60. echo NOTE:  TO MAKE THE PICTURE WINDOW GO AWAY, JUST TYPE 'q' IN IT.
  61. if ($#argv == 0) then
  62.     echo "==> TO SAVE THIS IMAGE, COPY THE FILE $SQUIRREL BEFORE EXITING"
  63.     echo ""
  64.     $X_VIEWER $SQUIRREL
  65.     rm $SQUIRREL
  66. else
  67.  
  68. foreach i ($*)
  69.     echo "==> TO SAVE THIS IMAGE, COPY THE FILE $i BEFORE EXITING"
  70.     echo ""
  71.     set dir=$i:h
  72.     if ($dir != $i) then
  73.     # Make the ln sure to work    
  74.     cd $dir
  75.     endif
  76.     ln $i $$.PRESS-q-TO-EXIT 
  77.     if (! $status) then 
  78.         sh -c "$X_VIEWER $$.PRESS-q-TO-EXIT"
  79.         rm $$.PRESS-q-TO-EXIT 
  80.     else
  81.         sh -c "$X_VIEWER $i"
  82.     endif
  83. end
  84. endif
  85.